home *** CD-ROM | disk | FTP | other *** search
/ The X-Philes (2nd Revision) / The X-Philes Number 1 (1995).iso / xphiles / hp48_1 / probabil < prev    next >
Internet Message Format  |  1995-03-31  |  4KB
  1. From noose.ecn.purdue.edu!samsung!cs.utexas.edu!rutgers!att!occrsh!uokmax!markl Fri Jul  6 08:30:42 EST 1990
  2. Article 699 of comp.sys.handhelds:
  3. Xref: en.ecn.purdue.edu comp.sys.handhelds:699 sci.math.stat:117
  4. Path: en.ecn.purdue.edu!noose.ecn.purdue.edu!samsung!cs.utexas.edu!rutgers!att!occrsh!uokmax!markl
  5. >From: markl@uokmax.uucp (Mark A. Lindsay)
  6. Newsgroups: comp.sys.handhelds,sci.math.stat
  7. Subject: HP28S basic probability programs
  8. Message-ID: <1990Jul5.215825.19863@uokmax.uucp>
  9. Date: 5 Jul 90 21:58:25 GMT
  10. Organization: Engineering Computer Network, University of Oklahoma, Norman, OK
  11. Lines: 206
  12.  
  13.  
  14.     The below programs are some short programs for the 28S for some
  15. basic probability applications (these are REAL basic).  Anyone with any
  16. knowledge of hp28 programming can probably do these themselves, but I'll
  17. post them anyway.
  18.  
  19.  
  20. BINO
  21.  
  22. This program solves a binomial problem.
  23. Programs used: NGX.
  24.  
  25. << 
  26. -> n x p
  27.     <<
  28.     n x COMB 
  29.     p x ^ * 
  30.     p NGX
  31.     n x - ^ *
  32.     >>
  33. >>
  34.  
  35.  
  36. CBIN
  37.  
  38. This program computes the cumulative value of a binomial distribution.
  39. Programs used: BINO.
  40.  
  41. <<
  42. -> n x p
  43.     <<
  44.     0
  45.     0 x FOR y
  46.     n y p BINO +
  47.     NEXT
  48.     >>
  49. >>
  50.  
  51.  
  52. GEOM
  53.  
  54. This program solves a geometric distribution.
  55. Programs used: NGX.
  56.  
  57. << 
  58. -> x p
  59.     <<
  60.     p NGX
  61.     x 1 - ^
  62.     p *
  63.     >>
  64. >>
  65.  
  66.  
  67. HYP
  68.  
  69. This program computes a hypergeometric distribution
  70.  
  71. <<
  72. -> r x t n
  73.     <<
  74.     r x COMB
  75.     t r - n x - COMB *
  76.     t n COMB /
  77.     >>
  78. >>
  79.  
  80.  
  81. NBT
  82.  
  83. This program solves a negative binomial distribution.
  84. It uses the program NGX.
  85.  
  86. <<
  87. -> x r p
  88.     <<
  89.     x 1 - x r - COMB
  90.     p r ^ *
  91.     p NGX x r - ^ *
  92.     >>
  93. >>
  94.  
  95.  
  96.  
  97. NGX
  98.  
  99. This program is used primarily in probability routines to compute the inverse
  100. probability of an event.
  101.  
  102. <<
  103. -> x
  104.     << 
  105.     1 x -
  106.     >>
  107. <<
  108.  
  109.  
  110. NORM
  111.  
  112. This program computes a zscore and then gives the upper tail probability of 
  113. the standard normal distribution with that zscore.
  114.  
  115. <<
  116. -> m s x
  117.     <<
  118.     0 1 x m - s / UTPN
  119.     >>
  120. >>
  121.  
  122.  
  123. PCDT
  124.  
  125. This routine is for use in the solver.  Store it as the equation go to the
  126. solver, plug in all values except x,  and type shift-x to solve the routine.
  127. It solves for a chi-square distribution.
  128.  
  129. << P N X UTPC - >>
  130.  
  131.  
  132. PFDT
  133.  
  134. This routine is for use in the solver.  Store it as the equation go to the
  135. solver, plug in all values except x,  and type shift-x to solve the routine.
  136. It solves for an F distribution.
  137.  
  138. << P M N X UTPF - >>
  139.  
  140.  
  141. PNDT
  142.  
  143. This routine is for use in the solver.  Store it as the equation go to the
  144. solver, plug in all values except x,  and type shift-x to solve the routine.
  145. It solves for a normal distribution.
  146.  
  147. << 1 P - M V X UTPN - >>
  148.  
  149.  
  150. POIS
  151.  
  152. This program computes a poisson distribution.
  153.  
  154. << 
  155. -> x l
  156.     << 
  157.     l x ^ 
  158.     l NEG EXP *
  159.     x FACT / 
  160.     >>
  161. >>
  162.  
  163.  
  164. PTDT
  165.  
  166. This routine is for use in the solver.  Store it as the equation go to the
  167. solver, plug in all values except x,  and type shift-x to solve the routine.
  168. It solves for a student's T distribution.
  169.  
  170. << P N X UTPT - >>
  171.  
  172.  
  173. U2
  174.  
  175. This program is called by UP to move up a directory on the path.
  176.  
  177. <<  
  178.     -> x
  179.     <<
  180.     DROP EVAL x 2 - DROPN
  181.     >>
  182. >>
  183.  
  184.  
  185. UP
  186.  
  187. This program changes directory to one higher on the path.
  188. Programs used:  U2.
  189.  
  190. <<  PATH  LIST->  U2 >>
  191.  
  192.  
  193. ZINT
  194.  
  195. This program computes from the input:
  196.         zscores of 2 bounds,
  197.         the area under the normal curve between the bounds,
  198.         the area not under the curve.
  199. Programs used: NORM, NGX
  200.  
  201. <<
  202. -> u l m s
  203.     <<
  204.     u m - s /
  205.     l m - s /
  206.     DUP2 2->LIST
  207.     3 ROLLD
  208.     0 SWAP 1 SWAP NORM SWAP
  209.     0 SWAP 1 SWAP NORM SWAP -
  210.     NEG DUP NGX 2->LIST
  211.     >>
  212. >>
  213.  
  214.  
  215.  
  216.                                  ---------------
  217. University of Oklahoma         | Mark A. Lindsay |         Veritas Omnia Vincit
  218.                                  ---------------
  219.  
  220.  
  221.